www.gusucode.com > 地方成人教育中心整站源代码 1 > 地方成人教育中心整站源代码 1.0/manage/Admin_News04Edit.asp
<!--#include file="conn.asp"--> <!--#include file="chkuser.asp"--> <!--#include file="FCKeditor/fckeditor.asp" --> <!--#include file="Function/Function_News04.asp"--> <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.04 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd"> <html> <head> <meta http-equiv="Content-Type" content="text/html; charset=gb2312"> <meta name="copyright" content="Copyright 2008 dananshan.com" /> <meta name="Author" content="闪电文章管理系统技术支持---www.dananshan.com" /> <meta name="Keywords" content="闪电文章管理系统文章管理系统" /> <meta name="Description" content="闪电文章管理系统文章管理系统" /> <title>添加教师培训</title> <link href="style.css" rel="stylesheet" type="text/css" /> <script src="../js/check.js" type="text/javascript"></script> </head> <body> <% '========判断是否具有管理权限 if Instr(session("AdminPower"),"|2304,")=0 then response.write ("<font color='red')>你不具有该管理模块的操作权限,请返回!</font>") response.end else if Request.QueryString ("Form")="Edit" then call Edit_Content() else call Add_Content() end if end if %> </body> </html> <% Function Add_Content() response.Write "<form method='post' action='?action=add'>" response.Write "<div id='frame_Toolbar' class='toolbarBg'>" response.Write "<a href='javascript:self.history.back();' class='icoBtn_ct'><span class='btnIco btnBack'></span><span class='btnTxt'>返回</span></a>" response.Write "<a href='javascript:self.location.reload();' class='icoBtn_ct'><span class='btnIco btnReload'></span><span class='btnTxt'>刷新</span></a><span class='split ftSplit' ></span>" response.Write "<div id='guide' class='light_orange'>请填写企业新闻!</div>" response.Write "<div class='pageInfo right light_gray'></div>" response.Write "</div>" response.Write "<table class='cTable_2 table'>" response.Write "<tr class='cTitle toolbarBg'>" response.Write "<td width='15%'><div>添加新闻</div></td>" response.Write "<td width='85%'> </td></tr>" response.Write "<tr>" response.Write "<td class='tRight'>新闻名称:</td>" response.Write "<td>" response.Write "<input name='NewsName' type='text' id='NewsName' style='width:250px;' onBlur='check_NewsName(this.value);'/>" response.Write "<input name='IsShow' type='checkbox' id='IsShow' value='checkbox' checked='checked' />发布 <span id='span_NewsName'>请填写新闻名称</span>" response.Write "</td></tr>" response.Write "<tr>" response.Write "<td class='tRight'>所属类别:</td>" response.Write "<td>" response.Write "<select style='width:250px;' name='Sort' onBlur='check_NewsSort(this.value);'>" response.Write "<option value='0' selected='selected'>=============请选择类别=============</option>" sql="Select * From Idea_News04Sort order by id" set rs=idea.exec(sql,1) do while not rs.eof response.Write "<option value='"&rs("ID")&"'>"&rs("SortName")&"</option>" rs.movenext loop rs.close set rs=nothing response.Write "</select> <span id='span_NewsSort'>请选择新闻类别</span>" response.Write "</td></tr>" response.Write "<tr>" response.Write "<td class='tRight'>新闻来源:</td>" response.Write "<td>" response.Write "<input name='Source' type='text' id='Source' style='width:250px;' onBlur='check_NewsSource(this.value);'/> <span id='span_NewsSource'>请填写新闻来源(如:闪电文章管理系统)</span>" response.Write "</td></tr>" response.Write "<tr>" response.Write "<td class='tRight'>新闻发布者:</td>" response.Write "<td>" response.Write "<input name='Publisher' type='text' id='Publisher' style='width:250px;' onBlur='check_NewsPublisher(this.value);'/> <span id='span_NewsPublisher'>请填写发布者(如:闪电文章管理系统)</span>" response.Write "</td></tr>" response.Write "<tr>" response.Write "<td class='tRight'>新闻图片:</td>" response.Write "<td>" response.Write "<input name='spic' id='spic' type='text' style='width:250px;'> " response.Write "<input type='hidden' id='pic' name='pic' />" response.Write "<iframe src='up/upload.asp?Type=Pic&Class=News' scrolling='no' topmargin='0' width='275' height='24' marginwidth='0' marginheight='0' frameborder='0' align='center'></iframe>" response.Write "<input name='Update' type='button' class='button' id='Update' style='height:20px;' value='上传至内容' onclick='Uptocontent();'/>" response.Write "</td></tr>" response.Write "<tr>" response.Write "<td valign='top' class='tRight'>新闻内容:</td>" response.Write "<td>" Dim oFCKeditor Set oFCKeditor = New FCKeditor oFCKeditor.BasePath="fckeditor/" oFCKeditor.ToolbarSet="Idea" oFCKeditor.Width="550" oFCKeditor.Height="350" oFCKeditor.Value="请填写相关信息!" oFCKeditor.Create "Content" response.Write "</td>" response.Write "</tr>" response.Write "</table>" response.Write "<div id='cEndToolbar' class='toolbarBg'>" response.Write "<div class='caButCase'>" response.Write "<input type='submit' name='Btn_OK' id='Btn_OK' disabled='disabled' value='确认添加' class='button'> " response.Write "<input type='reset' name='Submit2' value='清空重填' class='button'>" response.Write "</div>" response.Write "</div>" response.Write "</form>" End Function Function Edit_Content() ID=trim(request("ID")) if ID<>"" and IsNumeric(ID) then sql="select * from Idea_News04 where ID="&ID set rs=idea.exec(sql,1) do while not rs.eof response.Write "<form method='post' action='?Action=update&ID="&ID&"'>" response.Write "<div id='frame_Toolbar' class='toolbarBg'>" response.Write "<a href='javascript:self.history.back();' class='icoBtn_ct'><span class='btnIco btnBack'></span><span class='btnTxt'>返回</span></a>" response.Write "<a href='javascript:self.location.reload();' class='icoBtn_ct'><span class='btnIco btnReload'></span><span class='btnTxt'>刷新</span></a><span class='split ftSplit' ></span>" response.Write "<div id='guide' class='light_orange'>请填写企业信息!</div>" response.Write "<div class='pageInfo right light_gray'></div>" response.Write "</div>" response.Write "<table class='cTable_2 table'>" response.Write "<tr class='cTitle toolbarBg'>" response.Write "<td width='15%'><div>添加新闻</div></td>" response.Write "<td width='85%'> </td></tr>" response.Write "<tr>" response.Write "<td class='tRight'>新闻名称:</td>" response.Write "<td>" response.Write "<input name='NewsName' type='text' id='NewsName' style='width:250px;' value='"&rs("NewsName")&"' onBlur='check_NewsName(this.value);'/>" if rs("IsShow")=true then response.Write "<input name='IsShow' type='checkbox' id='IsShow' value='checkbox' checked='checked' />发布 <span id='span_NewsName'>请填写新闻名称</span>" else response.Write "<input name='IsShow' type='checkbox' id='IsShow' value='checkbox' />发布 <span id='span_NewsName'>请填写新闻名称</span>" end if response.Write "</td></tr>" response.Write "<tr>" response.Write "<td class='tRight'>所属类别:</td>" response.Write "<td>" response.Write "<select style='width:250px;' name='Sort' onBlur='check_NewsSort(this.value);'>" response.Write "<option value='0'>=============请选择类别=============</option>" sql1="Select * From Idea_News04Sort order by id" set rs1=idea.exec(sql1,1) do while not rs1.eof response.Write "<option value='"&rs1("ID")&"'" if cint(rs1("ID"))=rs("SortID") then response.Write " selected='selected'" end if response.Write ">"&rs1("SortName")&"</option>" rs1.movenext loop rs1.close set rs1=nothing response.Write "</select> <span id='span_NewsSort'>请选择新闻类别</span>" response.Write "</td></tr>" response.Write "<tr>" response.Write "<td class='tRight'>新闻来源:</td>" response.Write "<td>" response.Write "<input name='Source' type='text' id='Source' style='width:250px;' value='"&rs("Source")&"' onBlur='check_NewsSource(this.value);'/> <span id='span_NewsSource'>请填写新闻来源(如:闪电文章管理系统)</span>" response.Write "</td></tr>" response.Write "<tr>" response.Write "<td class='tRight'>新闻发布者:</td>" response.Write "<td>" response.Write "<input name='Publisher' type='text' id='Publisher' style='width:250px;' value='"&rs("Publisher")&"' onBlur='check_NewsPublisher(this.value);'/> <span id='span_NewsPublisher'>请填写发布者(如:闪电文章管理系统)</span>" response.Write "</td></tr>" response.Write "<tr>" response.Write "<td class='tRight'>新闻图片:</td>" response.Write "<td>" response.Write "<input name='spic' id='spic' type='text' style='width:250px;' value='"&rs("sNewsPic")&"'> " response.Write "<input type='hidden' name='pic' id='pic' value='"&rs("NewsPic")&"'/>" response.Write "<iframe src='up/upload.asp?Type=Pic&Class=News' scrolling='no' topmargin='0' width='275' height='24' marginwidth='0' marginheight='0' frameborder='0' align='center'></iframe>" response.Write "<input name='Update' type='button' class='button' id='Update' style='height:20px;' value='上传至内容' onclick='Uptocontent();'/>" response.Write "</td></tr>" response.Write "<tr>" response.Write "<td valign='top' class='tRight'>新闻内容:</td>" response.Write "<td>" Dim oFCKeditor Set oFCKeditor = New FCKeditor oFCKeditor.BasePath="fckeditor/" oFCKeditor.ToolbarSet="Idea" oFCKeditor.Width="550" oFCKeditor.Height="350" oFCKeditor.Value=rs("Content") oFCKeditor.Create "Content" response.Write "</td>" response.Write "</tr>" response.Write "</table>" response.Write "<div id='cEndToolbar' class='toolbarBg'>" response.Write "<div class='caButCase'>" response.Write "<input type='submit' name='Btn_OK' id='Btn_OK' value='确认修改' class='button'> " response.Write "<input type='reset' name='Submit2' value='清空重填' class='button'>" response.Write "</div>" response.Write "</div>" response.Write "</form>" rs.movenext loop rs.close set rs=nothing end if End Function %> <script language="javascript"> function Uptocontent() { if (document.getElementById("pic").value!="") { FCKeditorAPI.GetInstance("Content").SetHTML(FCKeditorAPI.GetInstance("Content").GetXHTML(true)+"<div align=center><img src='/"+document.getElementById("pic").value+"'></div>"); } } </script>